Public Class VisualizarValesDeMP
    Dim RNVisualizarValesDeMP As New RNCono.VisualizarValeDeMP

    Private Sub VisualizarValesDeMP_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        dgvValesdeMP.Inicializar(RNVisualizarValesDeMP.ObtenerValesPendientes())
    End Sub

    Private Sub cmdSeleccionar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdSeleccionar.Click
        Dim idVale As Integer
        idVale = Integer.Parse(dgvValesdeMP.ObtenerDatoSeleccionado("Codigo"))

    End Sub

    Private Sub cmdCerrar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdCerrar.Click
        Me.Dispose()
    End Sub
End Class